home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / C64 / T-TPUG Old Monthly Disks / (c)tn.d64 / rats.c (.txt) < prev    next >
Commodore BASIC  |  2007-02-04  |  236b  |  10 lines
  1. 50 REM***RATS SETUP PROGRAM***
  2. 100 POKE16384,0:POKE16385,0
  3. 110 POKE56578,PEEK(56578)OR3
  4. 120 POKE56576,(PEEK(56576)AND252)OR1
  5. 130 POKE53272,4:POKE648,128
  6. 140 POKE53280,12:POKE53281,12
  7. 145 POKE641,0:POKE642,64
  8. 150 POKE43,1:POKE44,64:POKE55,0:POKE56,128:POKE646,1:PRINT"[147]"
  9. 160 LOAD"RATS PART2.D",8
  10.